トップページ > Perlについて
●Perlについて●
2021-09-21 18:43:42標準モジュールで、画像の縦横サイズを取得する方法
画像の縦、横サイズは、Image::Magick(PerlMagick)で取得していますが、他のモジュールで取得可能です。
GDモジュールなら、Perl標準のモジュール(2021/09時点 Perl5 version24)なので、(但し、昔からあるモジュールのようです)後から手動でインストールする必要のないモジュールです。
※newFromJpegのjpgをpngかgif、gd、xbmに変更して使用することができます。
($width,$height) = $image->getBounds();
このメソッドはそのイメージの幅と高さの2つ要素を持つリストを返します。 取得することはできますが、一度、作成したらイメージの大きさを変更することはできません。…と、Perldoc.jpには書かれていますが、画像のサイズを変更できない、ということはGDモジュール上の話ですので、それは頭の片隅に置いておいてください。
参照1「Perldoc.jp GD」
参照2「cpan GD」(英語)
GDモジュールなら、Perl標準のモジュール(2021/09時点 Perl5 version24)なので、(但し、昔からあるモジュールのようです)後から手動でインストールする必要のないモジュールです。
use GD;
my $img = newFromJpeg GD::Image("./sample/example.jpg");
my ($width, $height) = $img->getBounds();
print "$width:$width $height:$height
";
※newFromJpegのjpgをpngかgif、gd、xbmに変更して使用することができます。
($width,$height) = $image->getBounds();
このメソッドはそのイメージの幅と高さの2つ要素を持つリストを返します。 取得することはできますが、一度、作成したらイメージの大きさを変更することはできません。…と、Perldoc.jpには書かれていますが、画像のサイズを変更できない、ということはGDモジュール上の話ですので、それは頭の片隅に置いておいてください。
参照1「Perldoc.jp GD」
参照2「cpan GD」(英語)
いいね:44 |